home *** CD-ROM | disk | FTP | other *** search
Text File | 1987-08-06 | 6.1 KB | 104 lines | [TEXT/CCL ] |
- #|This file contains argument lists for many of the functions exported
- in the CCL package. It is used by the Fred c-x c-a command.
- |#
-
- ("%HGET-BYTE" (FUNCTION) (ARGLIST H &OPTIONAL (OFFSET 0)))
- ("%HGET-LONG" (FUNCTION) (ARGLIST H &OPTIONAL (OFFSET 0)))
- ("%HGET-PTR" (FUNCTION) (ARGLIST H &OPTIONAL (OFFSET 0)))
- ("%HGET-SIGNED-BYTE" (FUNCTION) (ARGLIST H &OPTIONAL (OFFSET 0)))
- ("%HGET-SIGNED-WORD" (FUNCTION) (ARGLIST H &OPTIONAL (OFFSET 0)))
- ("%HGET-WORD" (FUNCTION) (ARGLIST H &OPTIONAL (OFFSET 0)))
- ("%HPUT-BYTE" (FUNCTION) (ARGLIST H VALUE &OPTIONAL (OFFSET 0)))
- ("%HPUT-LONG" (FUNCTION) (ARGLIST H VALUE &OPTIONAL (OFFSET 0)))
- ("%HPUT-PTR" (FUNCTION) (ARGLIST H VALUE &OPTIONAL (OFFSET 0)))
- ("%HPUT-WORD" (FUNCTION) (ARGLIST H VALUE &OPTIONAL (OFFSET 0)))
- ("%INC-PTR" (FUNCTION) (ARGLIST P &OPTIONAL (BY 1)))
- ("BUFFER-BWD-SEXP" (FUNCTION) (ARGLIST BUF &OPTIONAL (POS (MARK-POSITION BUF))
- &AUX CH))
- ("BUFFER-CHAR-POS" (FUNCTION) (ARGLIST W CHAR-OR-STRING &KEY
- (START (MARK-POSITION W)) (END (BUFFER-SIZE W)) FROM-END &AUX POS))
- ("BUFFER-COLUMN" (FUNCTION) (ARGLIST BUFFER &OPTIONAL POS))
- ("BUFFER-LINE" (FUNCTION) (ARGLIST BUF &OPTIONAL POS))
- ("BUFFER-NOT-CHAR-POS" (FUNCTION) (ARGLIST W CHAR-OR-STRING
- &KEY (START (MARK-POSITION W)) (END (BUFFER-SIZE W)) FROM-END &AUX POS))
- ("BUFFER-STRING-POS" (FUNCTION) (ARGLIST W STRING &KEY (START (MARK-POSITION W))
- (END (BUFFER-SIZE W)) FROM-END &AUX POS))
- ("CHOOSE-FONT-DIALOG" (FUNCTION) (ARGLIST &OPTIONAL FONT-SPEC))
- ("COMPILE-FILES" (FUNCTION) (ARGLIST VOLUME NAMES &OPTIONAL STARTING-FILE))
- ("CONSTRUCT-FILE-NAME" (FUNCTION) (ARGLIST VOLUME NAME &OPTIONAL TYPE))
- ("CONSTRUCT-FILE-NAMES" (FUNCTION) (ARGLIST VOLUME NAMES TYPE &OPTIONAL
- NAME-SPEC))
- ("COPY-RECORD" (FUNCTION) (ARGLIST SOURCE-RECORD RECORD-TYPE &OPTIONAL
- DEST-RECORD &AUX (SIZE (RECORD-LENGTH RECORD-TYPE))))
- ("DAYLIGHT-SAVING-TIME-P" (FUNCTION) (ARGLIST &OPTIONAL
- (UNIV-TIME (GET-UNIVERSAL-TIME))))
- ("DEFOBJECT" (FUNCTION) (ARGLIST NAME &REST PARENTS))
- ("DEFPASCAL" (FUNCTION) (ARGLIST NAME ARGLIST &BODY (BODY DECLS)))
- ("DEFRECORD" (FUNCTION) (ARGLIST RECORD-NAME &REST SLOT-DESCRIPTIONS))
- ("DELQ" (FUNCTION) (ARGLIST ITEM A-LIST &OPTIONAL (N 0 NP)))
- ("DEVICES" (FUNCTION) (ARGLIST &AUX NAMES))
- ("DIRECTORIES-IN-DIRECTORY" (FUNCTION) (ARGLIST PATH &AUX NAMES))
- ("DISPOSE-RECORD" (FUNCTION) (ARGLIST RECORD))
- ("DO-ALL-OBJECTS" (FUNCTION) (ARGLIST (VAR RESULT-FORM) &BODY BODY &ENVIRONMENT
- ENV))
- ("DO-DIRECTORIES-IN-DIRECTORY" (FUNCTION) (ARGLIST (DIR PATH &OPTIONAL RESULT)
- &BODY BODY))
- ("DO-FILES-IN-DIRECTORY" (FUNCTION) (ARGLIST (FILE DIR &OPTIONAL RESULT)
- &BODY BODY))
- ("DO-OBJECT-FUNCTIONS" (FUNCTION) (ARGLIST (VAR OBJECT RESULT-FORM)
- &BODY BODY &ENVIRONMENT ENV))
- ("DO-OBJECT-VARIABLES" (FUNCTION) (ARGLIST (VAR OBJECT RESULT-FORM)
- &BODY BODY &ENVIRONMENT ENV))
- ("EJECT-DISK" (FUNCTION) (ARGLIST PATH))
- ("EJECTEDP" (FUNCTION) (ARGLIST PATH))
- ("FIELD-INFO" (FUNCTION) (ARGLIST RECORD-TYPE FIELD-NAME))
- ("FILE-LOCKED-P" (FUNCTION) (ARGLIST PATH))
- ("FILES-IN-DIRECTORY" (FUNCTION) (ARGLIST PATH &AUX NAMES))
- ("FLUSH-VOLUME" (FUNCTION) (ARGLIST PATH))
- ("FONT-INFO" (FUNCTION) (ARGLIST &OPTIONAL FONT-SPEC &AUX FF MS))
- ("GET-RECORD-FIELD" (FUNCTION) (ARGLIST RECORD RECORD-TYPE FIELD-NAME))
- ("GET-STRING-FROM-USER" (FUNCTION) (ARGLIST &OPTIONAL
- (TITLE "Please type in a string.") (INITIAL-STRING "") (OK-STRING " OK ")
- (CANCEL-STRING " Cancel ") POSITION (SIZE 6553935)))
- ("LINES-IN-BUFFER" (FUNCTION) (ARGLIST BUF))
- ("LOAD-COMPILED-FILES" (FUNCTION) (ARGLIST VOLUME FILES &OPTIONAL
- (TYPE "fasl") FIRST-FILE))
- ("LOAD-FILES" (FUNCTION) (ARGLIST VOLUME FILES &OPTIONAL TYPE FIRST-FILE))
- ("LOCK-FILE" (FUNCTION) (ARGLIST PATH))
- ("MAKE-RECORD" (FUNCTION) (ARGLIST RECORD-TYPE &REST REST &KEY
- (STORAGE (RECORD-STORAGE RECORD-TYPE)) &ALLOW-OTHER-KEYS
- &AUX (SIZE (RECORD-LENGTH RECORD-TYPE)) RET))
- ("MESSAGE-DIALOG" (FUNCTION) (ARGLIST MY-STRING &OPTIONAL DIALOG-POSITION
- (DIALOG-SIZE 6553935)))
- ("MODAL-DIALOG" (FUNCTION) (ARGLIST DIALOG-OBJECT &OPTIONAL
- (CLOSE-ON-EXIT T) &AUX RET))
- ("PRINT-DB" (FUNCTION) (ARGLIST &REST FORMS &AUX))
- ("PRINT-RECORD" (FUNCTION) (ARGLIST RECORD RECORD-TYPE &OPTIONAL (CURRLEVEL 0)))
- ("REAL-FONT" (FUNCTION) (ARGLIST &OPTIONAL FONT-SPEC &AUX FF MS PORT))
- ("RECORD-DEFAULT" (FUNCTION) (ARGLIST TYPE))
- ("RECORD-FIELDS" (FUNCTION) (ARGLIST RECORD-TYPE))
- ("RECORD-INFO" (FUNCTION) (ARGLIST TYPE &OPTIONAL (ERRORP NIL)))
- ("RECORD-LENGTH" (FUNCTION) (ARGLIST RECORD-TYPE &AUX KIND))
- ("RECORD-STORAGE" (FUNCTION) (ARGLIST RECORD-TYPE))
- ("RECORD-TYPE-P" (FUNCTION) (ARGLIST TYPE))
- ("RETURN-FROM-MODAL-DIALOG" (FUNCTION) (ARGLIST VALUE))
- ("RLET" (FUNCTION) (ARGLIST &REST CALL))
- ("RREF" (FUNCTION) (ARGLIST RECORD ACCESSOR &KEY (STORAGE NIL STORAGE-SUPPLIED)
- &AUX SLOTS))
- ("RSET" (FUNCTION) (ARGLIST RECORD ACCESSOR VALUE &KEY
- (STORAGE NIL STORAGE-SUPPLIED) &AUX SLOTS))
- ("SET-RECORD" (FUNCTION) (ARGLIST RECORD RECORD-TYPE &REST ARGS))
- ("SET-RECORD-FIELD" (FUNCTION) (ARGLIST RECORD RECORD-TYPE FIELD-NAME VALUE))
- ("STRING-WIDTH" (FUNCTION) (ARGLIST STRING &OPTIONAL FONT-SPEC &AUX FF MS))
- ("UNLOCK-FILE" (FUNCTION) (ARGLIST PATH))
- ("UPDATE-COMPILED-FILES" (FUNCTION) (ARGLIST VOLUME NAMES &OPTIONAL
- LOAD-CHANGES? &AUX SOURCE-FILE-NAMES FASL-FILE-NAMES UPDATED-FILES))
- ("WITH-DEREFERENCED-HANDLES" (FUNCTION) (ARGLIST SPECLIST &BODY BODY))
- ("WITH-MARK" (FUNCTION) (ARGLIST (MARK-VAR PLACE &OPTIONAL POSITION BACKWARD-P)
- &BODY BODY &AUX (MARK (GENSYM))))
- ("WITH-POINTERS" (FUNCTION) (ARGLIST SPECLIST &BODY BODY))
- ("WITH-PORT" (FUNCTION) (ARGLIST PORT &REST BODY))
- ("WITH-PSTRS" (FUNCTION) (ARGLIST SPECLIST &BODY BODY))
- ("WITH-RETURNED-PSTRS" (FUNCTION) (ARGLIST SPECLIST &BODY BODY))
- ("Y-OR-N-DIALOG" (FUNCTION) (ARGLIST &REST ARGS))
- ("ZONE-POINTERP" (FUNCTION) (ARGLIST THING &AUX ZONE))